library(plotly)
## Loading required package: ggplot2
## 
## Attaching package: 'plotly'
## The following object is masked from 'package:ggplot2':
## 
##     last_plot
## The following object is masked from 'package:stats':
## 
##     filter
## The following object is masked from 'package:graphics':
## 
##     layout
data(iris)
#plot_ly(x= iris$Sepal.Width, y= iris$Sepal.Length, z = iris$Species, 
#type = "scatter3d", mode = "markers", color = iris$Species)
head(iris)
##   Sepal.Length Sepal.Width Petal.Length Petal.Width Species
## 1          5.1         3.5          1.4         0.2  setosa
## 2          4.9         3.0          1.4         0.2  setosa
## 3          4.7         3.2          1.3         0.2  setosa
## 4          4.6         3.1          1.5         0.2  setosa
## 5          5.0         3.6          1.4         0.2  setosa
## 6          5.4         3.9          1.7         0.4  setosa
plot_ly(x= iris$Petal.Width, y= iris$Petal.Length, z = iris$Species, 
type = "scatter3d", mode = "markers", color = iris$Species)
#put your mouse on the 3D picture and move your mouse, you can see the picture 
#from different angles